CAARefraction_RefractionFromApparent <-
function(Altitude, Pressure, Temperature){
.Call("CAARefraction_RefractionFromApparent", Altitude, Pressure, Temperature)
}
